home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cinema Studio: Frank Herrmann
/
Cinema Studio - Frank Herrmann.iso
/
tools
/
raystorm
/
arexx
/
title1.ray
< prev
next >
Wrap
Text File
|
1995-08-06
|
851b
|
39 lines
/***************
* NAME: title.ray
* VERSION: 1.0 06.08.1995
* DESCRIPTION: This ARexx-programm renders the RayStorm title
* (For this you need at last 3 MB of !!FREE!! memory)
* AUTHORS: Andreas Heumann
* BUGS: none
* TO DO: none
* HISTORY: DATE NAME COMMENT
* 06.08.95 ah initial release
***************/
OPTIONS RESULTS
IF ~SHOW('P','RAYSTORM') THEN DO /* if not allready running, start RayStorm */
ADDRESS COMMAND 'run >NIL: <NIL: /raystorm'
ADDRESS COMMAND WaitForPort RAYSTORM
END
ADDRESS RAYSTORM
OBJECTPATH '/objects'
SETSCREEN 160 128
SETCAMERA '0 300 -500 0 0 0 0 1 0 56.25 45'
SETWORLD '0 0 0 30 30 30'
POINTLIGHT '0 0 -700 255 255 255'
LOADOBJ 'title_light.iob'
LOADOBJ 'title.iob'
STARTRENDER 2
SAVEPIC 'title1.iff'
CLEANUP
exit 0